home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / pli / runpli1a.arc / SQRT < prev   
Encoding:
Text File  |  1987-09-28  |  100 b   |  7 lines
  1. i=1;
  2. DO WHILE (i <= 10);
  3.   PRINT(SYSPRINT,'SQRT(',i,') = ',SQRT(i));
  4.   PUTCRLF;
  5.   i=i+1;
  6. END;
  7.